﻿namespace SampleVM

module Main =
    type ViewModel =
        {
            BigIntCalc : BigIntCalc.ViewModel
            Selection  : Selection.ViewModel
        }

    let createViewModel() =
        {
            BigIntCalc = BigIntCalc.createViewModel()
            Selection  = Selection.createViewModel()
        }

type MainViewModel() =
    static let instance = Main.createViewModel()
    member this.Instance = instance

